home *** CD-ROM | disk | FTP | other *** search
/ The World of Computer Software / The World of Computer Software.iso / mymath55.zip / MATH1.BAT < prev    next >
DOS Batch File  |  1992-12-24  |  2KB  |  143 lines
  1. ECHO OFF
  2. REM  KEY.COM must be in the path.
  3. :START
  4. CLS
  5. MENU1
  6. REM  You may add a whole path to the above statement or change to this sub-dir.
  7. KEY
  8. IF ERRORLEVEL 97 IF NOT ERRORLEVEL 98 GOTO a
  9. IF ERRORLEVEL 98 IF NOT ERRORLEVEL 99 GOTO b
  10. IF ERRORLEVEL 99 IF NOT ERRORLEVEL 100 GOTO c
  11. IF ERRORLEVEL 100 IF NOT ERRORLEVEL 101 GOTO d
  12. IF ERRORLEVEL 101 IF NOT ERRORLEVEL 102 GOTO e
  13. IF ERRORLEVEL 102 IF NOT ERRORLEVEL 103 GOTO f
  14. IF ERRORLEVEL 103 IF NOT ERRORLEVEL 104 GOTO g
  15. IF ERRORLEVEL 104 IF NOT ERRORLEVEL 105 GOTO h
  16. IF ERRORLEVEL 105 IF NOT ERRORLEVEL 106 GOTO i
  17. IF ERRORLEVEL 106 IF NOT ERRORLEVEL 107 GOTO j
  18. IF ERRORLEVEL 107 IF NOT ERRORLEVEL 108 GOTO k
  19. IF ERRORLEVEL 108 IF NOT ERRORLEVEL 109 GOTO l
  20. IF ERRORLEVEL 109 IF NOT ERRORLEVEL 110 GOTO m
  21. IF ERRORLEVEL 110 IF NOT ERRORLEVEL 111 GOTO n
  22. IF ERRORLEVEL 111 IF NOT ERRORLEVEL 112 GOTO o
  23. IF ERRORLEVEL 112 IF NOT ERRORLEVEL 113 GOTO p
  24. IF ERRORLEVEL 113 IF NOT ERRORLEVEL 114 GOTO q
  25. IF ERRORLEVEL 114 IF NOT ERRORLEVEL 115 GOTO r
  26. IF ERRORLEVEL 115 IF NOT ERRORLEVEL 116 GOTO s
  27. IF ERRORLEVEL 116 IF NOT ERRORLEVEL 117 GOTO t
  28. IF ERRORLEVEL 117 IF NOT ERRORLEVEL 118 GOTO u
  29. IF ERRORLEVEL 118 IF NOT ERRORLEVEL 119 GOTO v
  30. IF ERRORLEVEL 119 IF NOT ERRORLEVEL 120 GOTO END
  31. GOTO START
  32. :a
  33. CLS
  34. RADIUS
  35. PAUSE
  36. GOTO START
  37. :b
  38. CLS
  39. DIAMETER
  40. PAUSE
  41. GOTO START
  42. :c
  43. CLS
  44. CIRCUM
  45. PAUSE
  46. GOTO START
  47. :d
  48. CLS
  49. AREA
  50. PAUSE
  51. GOTO START
  52. :e
  53. CLS
  54. SPHERE1
  55. PAUSE
  56. GOTO START
  57. :f
  58. CLS
  59. SPHERE2
  60. PAUSE
  61. GOTO START
  62. :g
  63. CLS
  64. RADCYL
  65. PAUSE
  66. GOTO START
  67. :h
  68. CLS
  69. HIGHTCYL
  70. PAUSE
  71. GOTO START
  72. :i
  73. CLS
  74. RADCON
  75. PAUSE
  76. GOTO START
  77. :j
  78. CLS
  79. HIGHTCON
  80. PAUSE
  81. GOTO START
  82. :k
  83. CLS
  84. C-TO-F
  85. PAUSE
  86. GOTO START
  87. :l
  88. CLS
  89. F-TO-C
  90. PAUSE
  91. GOTO START
  92. :m
  93. CLS
  94. K-TO-C
  95. PAUSE
  96. GOTO START
  97. :n
  98. CLS
  99. ROOT
  100. PAUSE
  101. GOTO START
  102. :o
  103. CLS
  104. EXP
  105. PAUSE
  106. GOTO START
  107. :p
  108. CLS
  109. QUAD
  110. PAUSE
  111. GOTO START
  112. :q
  113. CLS
  114. Q-OR-L
  115. PAUSE
  116. GOTO START
  117. :r
  118. CLS
  119. ADD
  120. PAUSE
  121. GOTO START
  122. :s
  123. CLS
  124. DIFF
  125. PAUSE
  126. GOTO START
  127. :t
  128. CLS
  129. MULT
  130. PAUSE
  131. GOTO START
  132. :u
  133. CLS
  134. DIV
  135. PAUSE
  136. GOTO START
  137. :v
  138. CLS
  139. AVG
  140. PAUSE
  141. GOTO START
  142. :END
  143. CLS